home *** CD-ROM | disk | FTP | other *** search
/ Pascal Super Library / Pascal Super Library (CW International)(1997).bin / LIBRARY / PAS_0493 / EMSICRC.PAS < prev    next >
Pascal/Delphi Source File  |  1993-04-15  |  999b  |  29 lines
  1. {─ Fido Pascal Conference ────────────────────────────────────────────── PASCAL ─
  2. Msg  : 302 of 318
  3. From : Bo Bendtsen                         2:231/111.0          09 Apr 93  12:44
  4. To   : Tom Lawrence                        1:2613/210.0
  5. Subj : IEMSI Sessions...
  6. ────────────────────────────────────────────────────────────────────────────────
  7. Hello Tom!
  8.  
  9. Monday April 05 1993, Steve Wierenga writes to Tom Lawrence:
  10.  
  11.  TL>> hard-coded the CRC's into the packets.  I would
  12.  TL>> appreciate knowing how you got the correct CRC's for
  13.  TL>> EMSI packets.. I couldn't even get A77E from (star, star)EMSI_REQ...
  14.  
  15. Just for your information, it's much faster than calculating every time. }
  16.  
  17. Const
  18.   EMS   = '**EMSI_';
  19.  
  20.   E_REQ = EMS+'REQA77E'+#13;
  21.   E_INQ = EMS+'INQC816'+#13;
  22.  
  23.   E_ACK = EMS+'ACKA490'+#13;
  24.   E_NAK = EMS+'NAKEEC3'+#13;
  25.   E_IRQ = EMS+'IRQ8E08'+#13;
  26.   E_IIR = EMS+'IIR61E2'+#13;
  27.   E_ISM = EMS+'ISM6E84'+#13;
  28.   E_CHT = EMS+'CHTF5D4'+#13;
  29.   E_TCH = EMS+'TCH3C60'+#13;